Chip 1997 March/CHIP Mart 1997.iso/SurfCam/SURFCAM.Z/GENERIC.M3

Text File | 1996-04-01 | 5KB | 197 lines

name Generic 3 Axis Mill

% 00
! 00
O 4
N >4
G 2
g 2 G
X ->3.>4
Y ->3.>4
Z ->3.>4
I ->3.>4
J ->3.>4
R ->3.>4
Q ->3.>4
F >3.1
H 2
D 2
T 2
M 2
S >4

ModalLetters X Y Z F R                # List of letters that are modal

ModalGs 0 1 2 3 73 74 76 80 81 82 83 84 85  # List of g codes that are modal

Sequence#s N 1 1 1                    # Char, freq, incr & start
First#? N                             # Y or N  'Output 1st sequence no.
Last#? N                              # Y or N  'Output last sequence no.

HCode X                               # X or X U  'Horizontal char.
VCode Y                               # Y or Y V  'Vertical char.
Dcode Z                               # Depth char.
FeedCode F                            # Feed rate char.

Comment ( )                           # Begin End comment char.

Spindle 3 4 5                         # Cw, ccw & stop m codes
Coolant 8 9 7                         # On, Off & Mist m codes
DComp 41 42 40                        # Left, Right & Cancel m codes
LComp 43 49                           # On & Off codes

Feed G1                             # Linear move
Rapid G0                            # Rapid positioning word
Cw G2                               # Circular move clockwise
Ccw G3                              # Circular move counter clockwise

Inc/Abs G 91 90                       # Inc & Abs char. & values
Inch/MM 70 71                         # Inch & Metric g codes

CtrCode I J                           # I J or R or I J K L
Helical? Y

CtrIncremental? Y                     # Y or N  'Inc or abs I & J
ByQuadrants? N                        # Y or N  'Break arcs at quadrants

Spaces? Y                             # Y or N  'Spaces between words
Incremental? N                        # Y or N  'Inc or abs output

Work G                                # Work offset register

UppercaseComments? Y                  # Y or N 'Require uppercase comments

Drill                                 # Drilling canned/manual cycle
G81 X[H] Y[V] Z[D] R[Vclear] F[FRate]
end cancel

Peck                                  # Pecking canned/manual cycle
G83 X[H] Y[V] Z[D] Q[VBite] R[Vclear] F[FRate]
end cancel

Tap                                   # Tapping canned/manual cycle
G84 X[H] Y[V] Z[D] R[Vclear] F[FRate]
end cancel

LTap                                  # Left handed tapping cycle
G74 X[H] Y[V] Z[D] R[Vclear] F[FRate]
end cancel

Ream                                  # Reaming canned/manual cycle
G85 X[H] Y[V] Z[D] R[Vclear] F[FRate]
end cancel

Bore                                  # Boring canned/manual cycle
G86 X[H] Y[V] Z[D] R[Vclear] F[FRate]
end cancel

Back                                  # Back boring canned/manual cycle
G87 X[H] Y[V] Z[D] R[Vclear] F[FRate]
end cancel

Cancel                                # Cancel a canned/manual cycle
G80
end

StartCode                             # Start of the program
%0
!0 O[Program#]
End

1stToolChange                         # First tool change
G0 G90 G80 G40 G17
T[Tool] M6
M[Direct] S[Speed]
G0 G[Work] X[H] Y[V]
G43 Z[D] H[Lcomp]
M[Cool]
End

Infeed                                # Enable cutter comp
G[Side] X[H] Y[V] D[DComp] F[FRate]
end

Outfeed                               # Disable cutter comp
G1 G40 X[H] Y[V]
end

ToolChange                            # Secondary tool changes
M[CoolantOff]
T[Tool] M6
M[Direct] S[Speed]
G0 X[H] Y[V]
G43 Z[D] H[Lcomp]
M[Cool]
End

EndCode                               # End of the program
G0 g91 G28 Z0
M30
%0
End

  #LineCode
  #G1 X[H] Y[V] Z[D] F[FRate]
  #End

  #RapidCode
  #G0 X[H] Y[V] Z[D]
  #End

  #CwCode
  #G2 X[H] Y[V] I[IVal] J[JVal] F[FRate]
  #End

  #CcwCode
  #G3 X[H] Y[V] I[IVal] J[JVal] F[FRate]
  #End

  #Custom1
  #G81 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  #end cancel

  #Custom2
  #G81 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  #end cancel

  #Custom3
  #G81 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  #end cancel

  #SubStart
  #O[Sub]
  #End

  #SubEnd
  #M99
  #End

  #SubCall
  #G[Work] P[Sub] M98
  #End

  #Between
  #M9
  #g91 G80 G30 Y0 Z0
  #G0 G40 G80 G90
  #M30
  #End

  #Index X
  #G0 G28 g91 Z0
  #G90 G[Work] X[H] Y[V] A[RotAngle]
  #G43 H[Lcomp] Z[D]
  #End

  #UnWind
  #G0 G28 g91 Z0
  #A0
  #G43 Z[D] H[Lcomp] M[Cool]
  #X[LastH] Y[LastV] A[LastRotAng]
  #G1 Z[LastD]
  #End

  #Upon RPlane
  #Ask "Val1" " Enter 98 or 99 for canned cycles" "98"
  #End